/ Art Works / Art Works.iso / demos / colourcard / _sparkler / _runimage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 2a ee 20 85 20 | e7 20 9f 3c 3e 31 37 20 |...*. . |. .<>17 |
|00000010| 8c 20 f1 20 f6 24 3b 22 | 20 61 74 20 6c 69 6e 65 |. . .$;"| at line|
|00000020| 20 22 3b 9e 3a e0 20 8b | 20 e0 0d 00 14 09 eb 20 | ";.:. .| ...... |
|00000030| 31 30 37 0d 00 1e 05 87 | 0d 00 28 1e c8 99 20 22 |107.....|..(... "|
|00000040| 58 4f 53 5f 43 4c 49 22 | 2c 22 42 6c 61 6e 6b 74 |XOS_CLI"|,"Blankt|
|00000050| 69 6d 65 20 30 22 0d 00 | 32 04 0d 00 3c 0d 4d 45 |ime 0"..|2...<.ME|
|00000060| 4d 54 4f 50 25 3d 93 0d | 00 46 3f d3 3d 26 31 34 |MTOP%=..|.F?.=&14|
|00000070| 30 30 30 20 3a 20 f4 20 | 34 38 4b 20 66 6f 72 20 |000 : . |48K for |
|00000080| 42 41 53 49 43 2c 20 65 | 76 65 72 79 74 68 69 6e |BASIC, e|verythin|
|00000090| 67 20 65 6c 73 65 20 66 | 6f 72 20 53 70 72 69 74 |g else f|or Sprit|
|000000a0| 65 50 6f 6f 6c 73 0d 00 | 50 04 0d 00 5a 3c c8 99 |ePools..|P...Z<..|
|000000b0| 20 22 4f 53 5f 46 69 6c | 65 22 2c 31 37 2c 22 3c | "OS_Fil|e",17,"<|
|000000c0| 73 70 61 72 6b 6c 65 72 | 24 44 69 72 3e 2e 63 6f |sparkler|$Dir>.co|
|000000d0| 72 6e 65 72 22 20 b8 20 | 2c 2c 2c 2c 43 6f 72 6e |rner" . |,,,,Corn|
|000000e0| 65 72 4c 65 6e 25 0d 00 | 64 12 43 6f 72 6e 65 72 |erLen%..|d.Corner|
|000000f0| 4c 65 6e 25 2b 3d 36 34 | 0d 00 6e 04 0d 00 78 0d |Len%+=64|..n...x.|
|00000100| 43 6f 72 6e 65 72 25 3d | 93 0d 00 82 2f 53 70 72 |Corner%=|..../Spr|
|00000110| 69 74 65 50 6f 6f 6c 25 | 3d 28 43 6f 72 6e 65 72 |itePool%|=(Corner|
|00000120| 25 2b 43 6f 72 6e 65 72 | 4c 65 6e 25 2b 32 35 35 |%+Corner|Len%+255|
|00000130| 29 20 80 20 b9 3c 3c 38 | 0d 00 8c 24 53 70 72 69 |) . .<<8|...$Spri|
|00000140| 74 65 4c 65 6e 25 20 3d | 20 4d 45 4d 54 4f 50 25 |teLen% =| MEMTOP%|
|00000150| 2d 53 70 72 69 74 65 50 | 6f 6f 6c 25 0d 00 96 04 |-SpriteP|ool%....|
|00000160| 0d 00 a0 11 de 20 62 6c | 6f 63 6b 25 20 31 30 32 |..... bl|ock% 102|
|00000170| 34 0d 00 aa 04 0d 00 b4 | 12 f2 67 65 74 5f 6d 6f |4.......|..get_mo|
|00000180| 64 65 5f 69 6e 66 6f 0d | 00 be 04 0d 00 c8 28 f2 |de_info.|......(.|
|00000190| 73 70 72 69 74 65 5f 69 | 6e 69 74 28 53 70 72 69 |sprite_i|nit(Spri|
|000001a0| 74 65 50 6f 6f 6c 25 2c | 53 70 72 69 74 65 4c 65 |tePool%,|SpriteLe|
|000001b0| 6e 25 29 0d 00 d2 24 f2 | 73 70 72 69 74 65 5f 69 |n%)...$.|sprite_i|
|000001c0| 6e 69 74 28 43 6f 72 6e | 65 72 25 2c 43 6f 72 6e |nit(Corn|er%,Corn|
|000001d0| 65 72 4c 65 6e 25 29 0d | 00 dc 04 0d 00 e6 3b c8 |erLen%).|......;.|
|000001e0| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|000001f0| 32 35 36 2b 31 30 2c 43 | 6f 72 6e 65 72 25 2c 22 |256+10,C|orner%,"|
|00000200| 3c 73 70 61 72 6b 6c 65 | 72 24 44 69 72 3e 2e 63 |<sparkle|r$Dir>.c|
|00000210| 6f 72 6e 65 72 22 0d 00 | f0 50 c8 99 20 22 4f 53 |orner"..|.P.. "OS|
|00000220| 5f 53 70 72 69 74 65 4f | 70 22 2c 35 31 32 2b 34 |_SpriteO|p",512+4|
|00000230| 30 2c 43 6f 72 6e 65 72 | 25 2c 43 6f 72 6e 65 72 |0,Corner|%,Corner|
|00000240| 25 2b 28 43 6f 72 6e 65 | 72 25 21 38 29 20 b8 20 |%+(Corne|r%!8) . |
|00000250| 2c 2c 2c 43 6f 72 6e 57 | 69 64 65 25 2c 43 6f 72 |,,,CornW|ide%,Cor|
|00000260| 6e 48 69 67 68 25 0d 00 | fa 1d 43 6f 72 6e 57 69 |nHigh%..|..CornWi|
|00000270| 64 65 25 3d 43 6f 72 6e | 57 69 64 65 25 2a 78 65 |de%=Corn|Wide%*xe|
|00000280| 69 67 25 0d 01 04 1d 43 | 6f 72 6e 48 69 67 68 25 |ig%....C|ornHigh%|
|00000290| 3d 43 6f 72 6e 48 69 67 | 68 25 2a 79 65 69 67 25 |=CornHig|h%*yeig%|
|000002a0| 0d 01 0e 04 0d 01 18 16 | f4 53 63 72 65 65 6e 57 |........|.ScreenW|
|000002b0| 69 64 74 68 25 3d 31 31 | 35 32 0d 01 22 16 f4 53 |idth%=11|52.."..S|
|000002c0| 63 72 65 65 6e 48 65 69 | 67 68 74 25 3d 38 35 37 |creenHei|ght%=857|
|000002d0| 0d 01 2c 04 0d 01 36 04 | 0d 01 40 27 53 25 3d 33 |..,...6.|..@'S%=3|
|000002e0| 32 20 3a 20 f4 20 4c 65 | 6e 67 74 68 20 6f 66 20 |2 : . Le|ngth of |
|000002f0| 73 69 64 65 20 6f 66 20 | 73 71 75 61 72 65 2e 0d |side of |square..|
|00000300| 01 4a 04 0d 01 54 18 58 | 25 3d 53 63 72 65 65 6e |.J...T.X|%=Screen|
|00000310| 57 69 64 74 68 25 20 81 | 20 53 25 0d 01 5e 19 59 |Width% .| S%..^.Y|
|00000320| 25 3d 53 63 72 65 65 6e | 48 65 69 67 68 74 25 20 |%=Screen|Height% |
|00000330| 81 20 53 25 0d 01 68 04 | 0d 01 72 3a 56 25 3d 58 |. S%..h.|..r:V%=X|
|00000340| 25 2a 59 25 3a 56 25 2d | 3d 31 3a de 20 56 25 28 |%*Y%:V%-|=1:. V%(|
|00000350| 56 25 29 2c 4a 25 28 56 | 25 29 3a e3 20 52 25 3d |V%),J%(V|%):. R%=|
|00000360| 30 20 b8 20 56 25 3a 56 | 25 28 52 25 29 3d 52 25 |0 . V%:V|%(R%)=R%|
|00000370| 3a ed 0d 01 7c 29 e3 20 | 52 25 3d 30 20 b8 20 56 |:...|). |R%=0 . V|
|00000380| 25 3a c8 94 20 56 25 28 | 52 25 29 2c 56 25 28 b3 |%:.. V%(|R%),V%(.|
|00000390| 28 56 25 2b 31 29 2d 31 | 29 3a ed 0d 01 86 04 0d |(V%+1)-1|):......|
|000003a0| 01 90 0d 4a 25 28 29 3d | 56 25 28 29 0d 01 9a 04 |...J%()=|V%()....|
|000003b0| 0d 01 a4 05 f5 0d 01 ae | 0d 6f 66 66 73 65 74 25 |........|.offset%|
|000003c0| 3d 30 0d 01 b8 05 f5 0d | 01 c2 13 20 20 20 20 57 |=0......|...    W|
|000003d0| 61 69 74 25 3d 91 2b 35 | 30 30 0d 01 cc 5e 20 20 |ait%=.+5|00...^  |
|000003e0| 20 20 c8 99 20 22 4f 53 | 5f 47 42 50 42 22 2c 31 |  .. "OS|_GBPB",1|
|000003f0| 30 2c 22 3c 73 70 61 72 | 6b 6c 65 72 24 44 69 72 |0,"<spar|kler$Dir|
|00000400| 3e 2e 50 69 63 74 75 72 | 65 73 22 2b bd 30 2c 62 |>.Pictur|es"+.0,b|
|00000410| 6c 6f 63 6b 25 2c 31 2c | 6f 66 66 73 65 74 25 2c |lock%,1,|offset%,|
|00000420| 32 35 35 20 b8 20 2c 2c | 2c 72 65 6d 61 69 6e 25 |255 . ,,|,remain%|
|00000430| 2c 6f 66 66 73 65 74 25 | 0d 01 d6 16 20 20 20 20 |,offset%|....    |
|00000440| e7 20 6f 66 66 73 65 74 | 25 3e 3d 30 20 8c 0d 01 |. offset|%>=0 ...|
|00000450| e0 57 20 20 20 20 20 20 | 20 20 e7 20 62 6c 6f 63 |.W      |  . bloc|
|00000460| 6b 25 21 26 31 30 3d 31 | 20 80 20 28 20 26 46 46 |k%!&10=1| . ( &FF|
|00000470| 46 20 80 20 28 21 62 6c | 6f 63 6b 25 29 3e 3e 38 |F . (!bl|ock%)>>8|
|00000480| 29 3d 26 46 46 39 20 80 | 20 28 62 6c 6f 63 6b 25 |)=&FF9 .| (block%|
|00000490| 21 38 29 3c 28 53 70 72 | 69 74 65 4c 65 6e 25 2d |!8)<(Spr|iteLen%-|
|000004a0| 36 34 29 20 8c 0d 01 ea | 40 20 20 20 20 20 20 20 |64) ....|@       |
|000004b0| 20 20 20 20 54 68 69 73 | 24 3d 22 3c 73 70 61 72 |    This|$="<spar|
|000004c0| 6b 6c 65 72 24 44 69 72 | 3e 2e 50 69 63 74 75 72 |kler$Dir|>.Pictur|
|000004d0| 65 73 2e 22 2b a4 72 74 | 6f 7a 28 62 6c 6f 63 6b |es."+.rt|oz(block|
|000004e0| 25 2b 32 30 29 0d 01 f4 | 38 20 20 20 20 20 20 20 |%+20)...|8       |
|000004f0| 20 20 20 20 c8 99 20 22 | 4f 53 5f 53 70 72 69 74 |    .. "|OS_Sprit|
|00000500| 65 4f 70 22 2c 32 35 36 | 2b 31 30 2c 53 70 72 69 |eOp",256|+10,Spri|
|00000510| 74 65 50 6f 6f 6c 25 2c | 54 68 69 73 24 0d 01 fe |tePool%,|This$...|
|00000520| 62 20 20 20 20 20 20 20 | 20 20 20 20 c8 99 20 22 |b       |    .. "|
|00000530| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 35 31 32 |OS_Sprit|eOp",512|
|00000540| 2b 34 30 2c 53 70 72 69 | 74 65 50 6f 6f 6c 25 2c |+40,Spri|tePool%,|
|00000550| 53 70 72 69 74 65 50 6f | 6f 6c 25 2b 28 53 70 72 |SpritePo|ol%+(Spr|
|00000560| 69 74 65 50 6f 6f 6c 25 | 21 38 29 20 b8 20 2c 2c |itePool%|!8) . ,,|
|00000570| 2c 57 69 64 74 68 25 2c | 48 65 69 67 68 74 25 0d |,Width%,|Height%.|
|00000580| 02 08 34 20 20 20 20 20 | 20 20 20 20 20 20 f2 73 |..4     |      .s|
|00000590| 70 61 72 6b 6c 65 72 28 | 57 69 64 74 68 25 2a 78 |parkler(|Width%*x|
|000005a0| 65 69 67 25 2c 48 65 69 | 67 68 74 25 2a 79 65 69 |eig%,Hei|ght%*yei|
|000005b0| 67 25 29 0d 02 12 1a 20 | 20 20 20 20 20 20 20 20 |g%).... |        |
|000005c0| 20 20 f5 20 fd 20 91 3e | 57 61 69 74 25 0d 02 1c |  . . .>|Wait%...|
|000005d0| 0d 20 20 20 20 20 20 20 | 20 cd 0d 02 26 09 20 20 |.       | ...&.  |
|000005e0| 20 20 cd 0d 02 30 10 fd | 20 6f 66 66 73 65 74 25 |  ...0..| offset%|
|000005f0| 3c 3d 30 0d 02 3a 07 fd | 20 30 0d 02 44 05 e0 0d |<=0..:..| 0..D...|
|00000600| 02 4e 04 0d 02 58 1e dd | f2 73 70 61 72 6b 6c 65 |.N...X..|.sparkle|
|00000610| 72 28 57 69 64 74 68 25 | 2c 48 65 69 67 68 74 25 |r(Width%|,Height%|
|00000620| 29 0d 02 62 1f ea 20 54 | 6f 70 25 2c 42 6f 74 74 |)..b.. T|op%,Bott|
|00000630| 6f 6d 25 2c 4c 65 66 74 | 25 2c 52 69 67 68 74 25 |om%,Left|%,Right%|
|00000640| 0d 02 6c 04 0d 02 76 25 | 42 6f 74 74 6f 6d 25 3d |..l...v%|Bottom%=|
|00000650| 28 53 63 72 65 65 6e 48 | 65 69 67 68 74 25 2d 48 |(ScreenH|eight%-H|
|00000660| 65 69 67 68 74 25 29 81 | 32 0d 02 80 18 54 6f 70 |eight%).|2....Top|
|00000670| 25 3d 42 6f 74 74 6f 6d | 25 2b 48 65 69 67 68 74 |%=Bottom|%+Height|
|00000680| 25 0d 02 8a 04 0d 02 94 | 21 4c 65 66 74 25 3d 28 |%.......|!Left%=(|
|00000690| 53 63 72 65 65 6e 57 69 | 64 74 68 25 2d 57 69 64 |ScreenWi|dth%-Wid|
|000006a0| 74 68 25 29 81 32 0d 02 | 9e 17 52 69 67 68 74 25 |th%).2..|..Right%|
|000006b0| 3d 4c 65 66 74 25 2b 57 | 69 64 74 68 25 0d 02 a8 |=Left%+W|idth%...|
|000006c0| 04 0d 02 b2 5e f4 50 52 | 49 4e 54 54 41 42 28 30 |....^.PR|INTTAB(0|
|000006d0| 2c 30 29 3b 57 69 64 74 | 68 25 3b 22 20 22 3b 48 |,0);Widt|h%;" ";H|
|000006e0| 65 69 67 68 74 25 3b 22 | 20 54 3a 22 3b 54 6f 70 |eight%;"| T:";Top|
|000006f0| 25 3b 22 20 42 3a 22 3b | 42 6f 74 74 6f 6d 25 3b |%;" B:";|Bottom%;|
|00000700| 22 20 4c 3a 22 3b 4c 65 | 66 74 25 3b 22 20 52 3a |" L:";Le|ft%;" R:|
|00000710| 22 3b 52 69 67 68 74 25 | 3b 22 20 20 20 22 3b 0d |";Right%|;"   ";.|
|00000720| 02 bc 0f e3 20 52 25 3d | 30 20 b8 20 56 25 0d 02 |.... R%=|0 . V%..|
|00000730| c6 2b 48 25 3d 28 56 25 | 28 52 25 29 20 83 20 59 |.+H%=(V%|(R%) . Y|
|00000740| 25 29 2a 53 25 3a 57 25 | 3d 28 56 25 28 52 25 29 |%)*S%:W%|=(V%(R%)|
|00000750| 20 81 20 59 25 29 2a 53 | 25 0d 02 d0 1f ef 20 32 | . Y%)*S|%..... 2|
|00000760| 34 2c 57 25 3b 48 25 3b | 57 25 2b 53 25 2d 31 3b |4,W%;H%;|W%+S%-1;|
|00000770| 48 25 2b 53 25 2d 31 3b | 0d 02 da 3d e7 20 57 25 |H%+S%-1;|...=. W%|
|00000780| 3c 4c 65 66 74 25 20 84 | 20 48 25 3c 42 6f 74 74 |<Left% .| H%<Bott|
|00000790| 6f 6d 25 20 84 20 28 57 | 25 2b 53 25 29 3e 52 69 |om% . (W|%+S%)>Ri|
|000007a0| 67 68 74 25 20 84 20 28 | 48 25 2b 53 25 29 3e 54 |ght% . (|H%+S%)>T|
|000007b0| 6f 70 25 20 8c 0d 02 e4 | 05 da 0d 02 ee 05 cd 0d |op% ....|........|
|000007c0| 02 f8 53 c8 99 20 22 4f | 53 5f 53 70 72 69 74 65 |..S.. "O|S_Sprite|
|000007d0| 4f 70 22 2c 35 31 32 2b | 33 34 2c 53 70 72 69 74 |Op",512+|34,Sprit|
|000007e0| 65 50 6f 6f 6c 25 2c 53 | 70 72 69 74 65 50 6f 6f |ePool%,S|pritePoo|
|000007f0| 6c 25 2b 28 53 70 72 69 | 74 65 50 6f 6f 6c 25 21 |l%+(Spri|tePool%!|
|00000800| 38 29 2c 4c 65 66 74 25 | 2c 42 6f 74 74 6f 6d 25 |8),Left%|,Bottom%|
|00000810| 2c 30 0d 03 02 52 c8 99 | 20 22 4f 53 5f 53 70 72 |,0...R..| "OS_Spr|
|00000820| 69 74 65 4f 70 22 2c 35 | 31 32 2b 33 34 2c 43 6f |iteOp",5|12+34,Co|
|00000830| 72 6e 65 72 25 2c 43 6f | 72 6e 65 72 25 2b 28 43 |rner%,Co|rner%+(C|
|00000840| 6f 72 6e 65 72 25 21 38 | 29 2c 53 63 72 65 65 6e |orner%!8|),Screen|
|00000850| 57 69 64 74 68 25 2d 43 | 6f 72 6e 57 69 64 65 25 |Width%-C|ornWide%|
|00000860| 2c 30 2c 38 0d 03 0c 1b | c8 94 20 4a 25 28 52 25 |,0,8....|.. J%(R%|
|00000870| 29 2c 4a 25 28 b3 28 56 | 25 2b 31 29 2d 31 29 0d |),J%(.(V|%+1)-1).|
|00000880| 03 16 05 ed 0d 03 20 0d | 56 25 28 29 3d 4a 25 28 |...... .|V%()=J%(|
|00000890| 29 0d 03 2a 05 e1 0d 03 | 34 04 0d 03 3e 0e dd a4 |)..*....|4...>...|
|000008a0| 72 74 6f 7a 28 70 25 29 | 0d 03 48 08 ea 20 71 24 |rtoz(p%)|..H.. q$|
|000008b0| 0d 03 52 0d c8 95 20 3f | 70 25 3e 33 31 0d 03 5c |..R... ?|p%>31..\|
|000008c0| 0e 20 20 71 24 2b 3d bd | 3f 70 25 0d 03 66 0b 20 |.  q$+=.|?p%..f. |
|000008d0| 20 70 25 2b 3d 31 0d 03 | 70 05 ce 0d 03 7a 07 3d | p%+=1..|p....z.=|
|000008e0| 71 24 0d 03 84 04 0d 03 | 8e 14 dd 20 f2 67 65 74 |q$......|... .get|
|000008f0| 5f 6d 6f 64 65 5f 69 6e | 66 6f 0d 03 98 0e 62 6c |_mode_in|fo....bl|
|00000900| 6f 63 6b 25 21 30 3d 34 | 0d 03 a2 0e 62 6c 6f 63 |ock%!0=4|....bloc|
|00000910| 6b 25 21 34 3d 35 0d 03 | ac 0f 62 6c 6f 63 6b 25 |k%!4=5..|..block%|
|00000920| 21 38 3d 31 31 0d 03 b6 | 10 62 6c 6f 63 6b 25 21 |!8=11...|.block%!|
|00000930| 31 32 3d 31 32 0d 03 c0 | 10 62 6c 6f 63 6b 25 21 |12=12...|.block%!|
|00000940| 31 36 3d 2d 31 0d 03 ca | 2d c8 99 20 22 4f 53 5f |16=-1...|-.. "OS_|
|00000950| 52 65 61 64 56 64 75 56 | 61 72 69 61 62 6c 65 73 |ReadVduV|ariables|
|00000960| 22 2c 62 6c 6f 63 6b 25 | 2c 62 6c 6f 63 6b 25 2b |",block%|,block%+|
|00000970| 32 30 0d 03 d4 18 78 65 | 69 67 25 3d 31 3c 3c 28 |20....xe|ig%=1<<(|
|00000980| 62 6c 6f 63 6b 25 21 32 | 30 29 0d 03 de 18 79 65 |block%!2|0)....ye|
|00000990| 69 67 25 3d 31 3c 3c 28 | 62 6c 6f 63 6b 25 21 32 |ig%=1<<(|block%!2|
|000009a0| 34 29 0d 03 e8 24 53 63 | 72 65 65 6e 57 69 64 74 |4)...$Sc|reenWidt|
|000009b0| 68 25 3d 28 62 6c 6f 63 | 6b 25 21 32 38 2b 31 29 |h%=(bloc|k%!28+1)|
|000009c0| 2a 78 65 69 67 25 0d 03 | f2 25 53 63 72 65 65 6e |*xeig%..|.%Screen|
|000009d0| 48 65 69 67 68 74 25 3d | 28 62 6c 6f 63 6b 25 21 |Height%=|(block%!|
|000009e0| 33 32 2b 31 29 2a 79 65 | 69 67 25 0d 03 fc 05 e1 |32+1)*ye|ig%.....|
|000009f0| 0d 04 06 04 0d 04 10 1d | dd f2 73 70 72 69 74 65 |........|..sprite|
|00000a00| 5f 69 6e 69 74 28 50 6f | 6f 6c 25 2c 4c 65 6e 25 |_init(Po|ol%,Len%|
|00000a10| 29 0d 04 1a 0f 21 50 6f | 6f 6c 25 3d 4c 65 6e 25 |)....!Po|ol%=Len%|
|00000a20| 0d 04 24 0e 50 6f 6f 6c | 25 21 38 3d 31 36 0d 04 |..$.Pool|%!8=16..|
|00000a30| 2e 20 c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f |. .. "OS|_SpriteO|
|00000a40| 70 22 2c 32 35 36 2b 39 | 2c 50 6f 6f 6c 25 0d 04 |p",256+9|,Pool%..|
|00000a50| 38 05 e1 0d ff          |                         |8....   |        |
+--------+-------------------------+-------------------------+--------+--------+